home *** CD-ROM | disk | FTP | other *** search
- /*
- * TackOn.c - Copyright © 1991 by Devil's child.
- *
- * Created: 11 Sep 1992 18:00:25
- * Modified: 26 Nov 1992 21:49:17
- *
- * Make>> sc <file>.c
- * Make>> slink <file>.o SC SD ND BATCH NOICONS TO <file>
- */
-
-
- long main(void)
- {
- struct DosLibrary *DOSBase;
- struct RDArgs *RA;
- char *Argv[] = { NULL, NULL, NULL };
- char Buf[256];
- long rc=20;
-
- if (DOSBase = (struct DosLibrary *)OpenLibrary("dos.library", 37)) {
- if (RA = ReadArgs("Path/A,File/A", (long *)Argv, NULL)) {
- strcpy(Buf, Argv[0]);
- AddPart(Buf, Argv[1], 256);
- Printf("%s\n", Buf);
- FreeArgs(RA);
- rc = 0;
- }
- else
- PrintFault(IoErr(), "TackOn");
- CloseLibrary((struct Library *)DOSBase);
- }
- return rc;
- }
-
-
-